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ABSTRACT 

Between 1977 and 1981, the Basic Skills Component of 
Research for Better Schools worked with education agencies to develop 
a research-based approach to improving basic skills instruction and 
student achievement. Called Achievement Directed Leadership (ADL) , 
the approach was field tested extensively in three school districts 
during the 1981-82 school year. It is noted that these tests provided 
persuasive evidence that educators could be trained to use research 
findings to monitor and manage critical classroom processes, and 
further evidence strongly suggested that student achievement improved 
according to the degree of ADL implec station. A key element in the 
project was the development of a microcomputer program to facilitate 
the collection and management of quantitative data by educators for 
their instructional decision making. The introduction to this report 
provides an overview of the investigation, a description of ADL, and 
a discussion of the use of microcomputers in schools. The methodology 
of the project is then presented, including the plan of investigation 
and the procedure. The section on the conduct of the investigation 
and findings of the project describes the design of the 
microcomputer-based support system for the ADL; the component's 
efforts to modify commercially available software to assist educators 
with the management of ADL; and the development and evaluation of an 
in-house software program, CONFERENCE. Finally, the conclusion 
addresses the technical feasibility and advantages for users in using 
the microcomputer for ADL data-based decision making. Included in the 
appendices are data collection forms, the principal/teacher 
conference form, and the CONFERENCE program code. (JLB) 
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INTRODUCTION 



This report is divided into four parts—introduction, methodology, 
conduct of investigation and conclusions. The three sections of the intro- 
duction discuss (1) an overview of the investigation, (2) the instructional 
improvement program called Achievement Directed Leadership, and (3) the use of 
microcomputer technology in schools. 



Overview 



Between 1977 and 1981 the Basic Skills Component (BSC) worked with a 
number of cooperating education agencies to develop a research-based approach 
to improving basic skills instruction and student achievement. The approach, 
which came to be kno-.m as Achievement Directed Leadership (ADL) , was field 
tested intensively in three school districts during the 1981-82 school year. 
The field test provided persuasive evidence that educators could be trained to 
use research findings to monitor and manage critical classroom processes. 
Further evidence strongly suggested that student achievement improved accord- 
ing to the degree of ADL implementation. 

However, BSC also learned that educators were not generally accustomed to 
using quantitative data for instructional decision making, nor were they 
comfortable or adept at collecting and managing such data. We therefore 
reasoned that, if the use of a microcomputer could make the storage and 
manipulation of ADL data more efficient and accurate and reduce paperwork, 
then educators might be more willing to use quantitative data in their decision 
making. BSC hypothesized that computer technology could facilitate the use of 
ADL— and a more effective use of ADL would mean more efficient classroom 
instruction and increased student achievement. 
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Ach ievement Directed Leadership 



Achievement Directed Leadership (ADL) has two main features, an instruc- 
tional leadership plan and a training/implementation program designed for its 
installation. Only the leadership plan is of interest here. 

The leadership plan specifies roles and functions for teachers and 
administrators to help them coordinate their efforts to achieve and maintain 
instructionally effective classrooms (see Figure 1), The main thrust of the 
plan is cooperative, effective monitoring and managing of critical conditions 
and processes that affect the classroom performance of students and educa- 
tors — with ultimate impact: on student achievement. 
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Figure 1. The ADL leadership plan. 



ADL calls for use of a four-step improvement cycle to help educators 
collect data on the critical variables and identify and exploit opportunities 
for improvement (see Figure 2), 
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Figure 2. Four-step improvement cycle, 



The linch pin in the instructional improvement process is the principal. 
The principal is continually informed of classroom conditions through class- 
room visits and the review of teachers' instructional plans. During regularly 
scheduled principal/teacher conferences, the principal assists teachers in 
Working through the improvement cycle. The primary outcome of the principal/ 
teacher conference is a plan to address opportunities for improvement which 
were jointly identified during the conference. The principal subsequently 
shares teachers' improvement plans and progress with district leadership, 
during superintendent/principal conferences. During these conferences the 
principal can enlist central office time, resources, and inservice support for 
teachers' improvement efforts. Conference procedures and forms have been 
developed to structure and facilitate both the principal/teacher conference 
and the superintendent/principal conference. 



Schools' Use of Microcomputers 

It is common practice for schools to use microcomputers both as 
administrative and instructional tools. Administrative uses include word 
processing and scheduling. In addition to instruction in computer programming 
and computer literacy, microcomputers are used in the classroom as an aid to 
instruction. The use of microcomputers as an instructional aid can be divided 
into two general categories: Computer-Assisted Instruction (CAI) , using the 
microcomputer to present instruction and/or to interact with a student to 
enhance learning (e.g., tutorial systems, drill exercises); and Computer- 
Managed Instruction (CMI), using the microcomputer for record keeping, 
diagnostic testing and scoring, and prescribing. 

The proposed use of the microcomputer to facilitate educators' use of 
Achievement Directed Leadership (AUL) would differ from both CAI and CMI 
systems. In these systems the computer manages individual student progress 
(through a computerized or non-computerized curriculum) by continually 
informing the student as to what steps should be taken next. In ADL: 

• the teacher and principal, not the computer program, make decisions 
based on the status of critical classroom variables 

• the critical variables include classroom management variables, in 
addition to instructional variables 

• the decisions made are either for an entire class or for instructional 
groups within the class, not for individual students 

• the instructional decision making involves matching identified oppor- 
tunities for improvement with research-based improvement strategies co 
be used by teachers. 

To the best of our knowledge, at the time of this investigation there was 
no existing system that would guide educators in their instructional decision 
making according to assessments of various classroom conditions and processes. 
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METHODOLOGY 

The specific goals of this project were: (1) to investigate the feasi- 
bility of using the computer to facilitate the implementation of Achievement 
Directed Leadership; and (2) to determine the advantages of the microcomputer- 
driven system; that is, will it reduce onerous tasks (i.e., record keeping, 
calculations, projections) and thus improve educators 1 motivation to use 
quantitative data in instructional decision making? This methodology section 
presents both the plan and procedure for conducting the investigation. 

Plan of Investigation 

The component's plan to meet the two above stated goals had three 
steps . 

• design a microcomputer-based support system that would facili- 
tate educators 1 use of Achievement Directed Leadership 

• locate and/or develop software to implement the microcomputer 
support role, with assistance from local educators 

• evaluate the feasibility and advantages of the microcomputer- 
based support system. 

The scope of this investigation included these three steps, with 

technical feasibility at the school level being the major focus. 

Procedure 

This section describes the procedures the Basic Skills Component (BSC) 
used to carry out the plan of the investigation. The implementation of these 
procedures is discussed in the next part of the report, conduct of investi- 
gation and findings. 
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BSC staff, with assistance from an RBS computer programmer, studied the 



Apple II Plus computer's capabilities in terms of Achievement Directed 
Leadership (ADL) processes and goals in order to design a microcomputer 
support system that was both realistic and faithful to the ADL model. BSC 
decided to work with the Apple II Plus system with 64K since, at the time, 
this system was the one found in many schools. 

The procedure for software modification/development and evaluation was as 
follows: 

• research available software and solicit opinions of RBS programmer and 
outside consultants in order to identify commercially available 
software which could be modified to facilitate research-based decision 
making at the classroom level 

• if software modification is not feasible, work with RBS programmer to 
attempt development of our own program and support materials (User's 
Guide, manual, data entry forms) 

• have RBS staff participate in a pre-field trial with modified or new 
software (i.e., hands-on experience using simulated data); revise 
software based on informal feedback on ease of program use and 
advantages/disadvantages over traditional methods of monitoring ADL 
variables 

• conduct a field trial of modified or new software; provide educators 
with hands-on experience (using simulated data) or a BSC demonstra- 
tion, followed by a survey (see Appendix A for data collection forms) 
and/or unstructured interview; revise software based on survey/ 
interview responses 

• conduct additional field trials and revisions, if necessary. 
Educators participating in the field trials were: 

• teachers and administrators from a Pennsylvania middle school 
currently working with the BSC to develop a secondary version of 'ADL 

• elementary school principals currently implementing ADL in the same 
Pennsylvania district 

• curriculum coordinators from the same Pennsylvania district. 
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CONDUCT OF INVESTIGATION AND FINDINGS 

This chapter describes the conceptualization of a microcomputer-based 
support system to facilitate Achievement Directed Leadership (ADL) , the 
component 1 s efforts to modify commercially available software to assist 
educators with the manage ^ent of ADL's critical variables, and the subsequent 
development of new software, in conjunction with a commercially developed 
data-based management system. 

Design of Micrcoinputer-Based Support System 

Figure 3 shows the microcomputer-based support system the BSC designed to 
facilitate ADL. It diagrams how the various levels of a school district might 
use the computer for instructional decision making. In step 1, long-term 
instructional plans and classroom data are collected and entered into the 
microcomputer, and class files are updated. When the principal and teacher 
meet for a supervisory conference (step 2) , they run a conference program 
which analyzes the data for each classroom variable and compares the class 
data to research findings and/or instructional goals in order to diagnose 
opportunities for improvement and assess progress. The microcomputer prints 
out and stores a record of the data and analyses, along with strategies for 
developing or altering instructional plans. The teacher, with the support of 
the principal, implements the strategies agreed upon and the cycle begins 
anew. 

The diagram also shows that, ideally, all individual teacher reports are 
incorporated into a building level summary, and all building reports are 
incorporated into a district summary. In step 3, principals or central office 
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staff then use these summaries to identify common opportunities for improving 
instruction across teachers and across schools, and to plan inservice accord- 
ingly (step 4) . 

Review/Modify and Evaluate Existing Software 

We orginially assumed that the ways in which the microcomputer could best 
assist with management of Achievement Directed Leadership's (ADL ? s) critical 
variables would vary for principal and teacher. For teachers, the micro- 
computer could help them develop and update long-term instructional plans, 
which include data on a class' prior learning, success on daily work and 
mastery of sk^ls on unit tests and information on the content of the year-end 
achievement test. For principals, the computer could provide them with a 
suirmary of this information, along with the class* average student engaged 
time, during the principal/ teacher conference. These data could then be 
compared to research findings and teacher goals. When opportunities for 
improvement are identified, the principal and teacher could plan and implement 
change strategies. Thus, we set out t^ develop separate principal and teacher 
programs . 

The BSC selected VisiSeries integrated software (VisiFile and ViciCalc) 
because ifoffered the possibility for creating interfacing principal and 
teacher programs which could be used to manage ADL data. Using VisiFile, two 
versions of long-term instructional planning programs were developed, varying 
in amount of curriculum detail. Both programs were demonstrated to five 
middle school teachers and three curriculum coordinators in the Pennsylvania 
district. The educators felt that the programs could be useful, particularly 
the shorter version, but six of the eight felt that the programs would not 
make their own work any easier. Also, these educators were not very committed 



to the concept of long range instructional planning — and the potential of 
computer support for the planning process did not increase their commitment. 
In light of the fact that these initial programs did not appear to make ■ 
teachers' planning and monitoring tasks less onerous or time consuming, we 
abandoned this line of investigation. Additional support for this decision 
resulted from our review of VisiCalc to create an interfacing program for 
principals. VisiCalc* s "chart" format did not seem to offer a way of summari- 
zing classroom data that was more efficient than ADL T s principal/teacher 
conference form. Instead, we attempted to develop our own program which more 
closely followed our original conceptualization — a program that the principal 
and teacher could use together, during the principal/teacher participatory 
supervision conference, to assist with the management of classroom data. 

Software Development and Evaluation 

The design for the principal/ teacher conference program was based on our 
initial conceptualization of a computer-based support system (see Figure 3, p. 
7) and was patterned after Achievement Directed Leadership's (ADL's) 
principal/teacher conference form (see Appendix B) . The conference form 
records information on student variables which are highly related to student 
achievement — student engaged time, prior learning, coverage of criterion 
content and academic performance — along with identified opportunities for 
improvement and selected improvement strategies. 

The first program BSC developed calculated and analyzed student engaged 
time. The program was demonstrated to six middle school teachers and six 
administrators from the Pennsylvania district and was positively received — all 
felt it was easy to use and 75 percent felt it would help them implement ADL; 
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the other 25 percent were uncertain. As a result of this feedback, we expanded 
the program to include ADL's other classroom variables. The resulting program, 
CONFERENCE, presented questions about a class* status on the ADL variables 
which were to be answered during the principal/ teacher conference. The 
program then compared the data entered for each variable to corresponding 
research standards and listed opportunities for improvement. Fourteen elemen- 
tary principals in the Pennsylvania district previewed CONFERENCE and the 
accompanying User's Guide. The majority (86 percent) of the educators felt 
CONFERENCE would be very useful, and all found the program and User's Guide 
easy to use. However, upon closer consideration, BSC realized that CONFERENCE 
was not really helping teachers with their paperwork, i.e., maintaining 
records and manipulating raw data to measure the critical variables. Although 
the program organized the data, compared the data to research findings and 
listed improvement opportunities, it did very little computing— it asked for 
data, such as mastery levels, that teachers had to calculate. BSC felt that 
teachers would be tempted to guess the status of the variables during the 
conference rather than collect and analyze actual data. As a result of 
further investigation, BSC learned that a data-based management system could 
be added to CONFERENCE to create a program that would maintain ongoing records 
on each of the variables. It would also respond to CONFERENCE'S requests for 
information through data retrieval, calculations (e.g., coverage to date) or 
projections (e.g., student achievement scores based on planned coverage). 

Sierra's General Manager II was selected as the data-based management 
system that best met the need to revise CONFERENCE for three primary reasons: 
it could be used with the existing operating system, several filed could be 
opened simultaneously, and it '..ad allocated space for a user program such as 
CONFERENCE. However, after setting up a filing system with information about 
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each of the variables, we found that General Manager II was not designed to 
accomodate a user program as long as CONFERENCE. Our solution was to shorten 
CONFERENCE to fit General Manager II 's allocated space. This involved elimi- 
nating some of the program's elegance, i.e., the graphics and the space 
allocated for a user to enter his or her own improvement plans. The shortened 
program listed improvement strategies In a menu format from which a user could 
opt to select up to three. (See Appendix C for this final version of the 
program code.) 

Because the revised program was completed late in the school year, there 
was only sufficient time to demonstrate CONFERENCE to two middle schoo. 
administrators in the Pennsylvania district. During unstructured interviews, 
the administrators indicated that they liked the information that CONFERENCE 
provided — CONFERENCE would make it easier for them to monitor teachers' status 
on the classroom variables and to work with teachers In identifying and 
meting instructional needs. Thus, the addition of the data-based management 
system to CONFERENCE suggests that the computer can provide useful information 
that supports instructional decision making by administrators. 
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CONCLUSIONS 

The previous sections of this report describe- the component's investi- 
gation into the use of the microcomputer to facilitate Achievement Directed 
Leadership's data-based decision making. This section presents some conclu- 
sions concerning the two major questions of this investigation: (1) is it 
feasible to use the computer to facilitate the implementation of Achievement 
Directed Leadership (ADL) ; and (2) are there advantages to the microcomputer- 
driven system, that is, will it reduce onerous tasks (i.e., record keeping, 

calculations, projections) and thus improve educators' motivation to use 

quantitative data in instructional decision making? 

Technical Feasibility 

The Basic Skills Component's investigation suggests that it is possible to 
use the microcomputer to efficiently store and manipulate data on the critical 
classroom variables. The BSC was successful in developing such a program for 
the Apple II Plus computer with 64K using Sierra's General Manager II as a 
data-based management system. This program, CONFERENCE, is not elaborate due 
to space limitations of the data-based management system, but it is consistent 
with the intent behind Achievement Directed Leadership. We are encouraged 
that, if we were to pursue a study of the impact of CONFERENCE, component 
members could work with the. developers of General Manager II to overcome the 
system's space limitation and create a more sophisticated, but still user- 
friendly software package. 



Advantages for Users 

The component's field experience suggests that the advantages of using 
quantitative data for instructional decision making are not intuitively 
obvious to all educators. Those in favor of using this type of data tend to 
see the microcomputer as a valuable tool because of its ability to store data 
in an orderly fashion, and quickly retrieve and analyze data as needed. 
Likewise, educators that do not favor the use of quantitative data for decision 
making do not see the need for a microcomputer support system. These educators 
fear that the use of a microcomputer will reduce room for their discretion and 
professional judgment. Thus, although the component developed a program that 
appears to reduce the paperwork involved in managing quantitative data for 
instructional decision making and increase the accuracy and efficiency of 
instructional decision making, such a program can only be effective to the 
extent that it is implemented. Unless educators value monitoring such data 
for instructional decision making, the concept of a microcomputer-driven 
system to facilitate the process will not be either motivating or readily 
accepted . 

In conclusion, our experience suggests that educators who favor 
Achievement Directed Leadership (ADL) , a form of research-based instructional 
decision making, will accept and use such a microcomputer-based support 
system; educators who do not favor ADL will not accept and use such a system. 
However, with appropriate training, experience and incentives, more educators 
might come to understand and value the advantages of this type of system. 
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Appendix A 



Data Collection Forms 



ACHIEVEMENT DIRECTED LEADERSHIP (ADL) 
COMPUTER SUPPORT REACTIONS 



Questions 1-6 refer to the Time Program : 



Strongly 

Agree Agree Uncertain Disagree 



1. I believe that teachers and administra- 
tors could learn to use this program. 

2. If I were a teacher or administrator 
implementing ADL, I would like to use 
this program. 

3. I think that using this program would make 
it easier to implement ADL. 

4. I think that teachers and administrators 
could do a better job of implementing 
ADL if they used this program. 



SA 



SA 



SA 



Strongly 
Disagree 



SD 



SD 



SD 



SD 



5. What do you like best about the computer program? 



6. What suggestions do you have for improving the program? 



Questions 7-1 \ refer to using the Content Program at the beginning of the year to plan 
instructional content: 



7. If I were a teacher or administrator 
implementing ADL f I would like to use 
this program. 

8. I think that using this program would 

make it easier to implement ADL. 

9. I think that teachers and administra- 
tors could do a better job of 
implementing ADL if they used this 
program. 



SA 



SA 



SA 



SD 



SD 



SD 
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10. What do you like best about the computer program? 



11. What suggestions do you have for improving . the program? 



Questions 12-16 refer to using the Content Program throughout the school year to monitor 
coverage and students' academic performance: 

Strongly Strongly 

Agree Agree Uncertain Disagree Disagree 



12. If T were a teacher or administrator 
implementing ADL, I would like to use 
this program. 



SA A U D SD 



13. I think that using this program would 

make it easier to implement ADL. SA A U D SD 

14. I think that teachers and administra- 
tors could do a better job implementing SA A U D SD 
ADL if they used this program. 

15. What do you like best about the computer program? 



16. What suggestions do you have for improving the program? 
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Response to CONFERENCE 



1. I think that having a program like CONFERENCE would be: 

( ) very ( ) somewhat ( ) of limited ( ) not 

useful useful use useful 

2. In its current form, CONFERENCE is: 

( ) very easy ( ) easy to ( ) not easy ( ) not 

to use use to use usable 

3. CONFERENCE could be improved by making the following changes: 



A. In- its current form, the Users Guide for CONFERENCE is: 

( ) very easy ( ) easy to ( ) not easy ( ) not 

to use use to use usable 

5. The Users Guide for CONFERENCE* would be more helpful if it included 
information about: 



6- The Users Guide for CONFERENCE would be more helpful if information 
about the following was not included: 



7, Other comments: 



*If you have written comments on your copy of the Users Guide please 
rn 9^ feel free to j.ive that copy to BSC staff. 
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Principal/Teacher Conference Form 
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PRINCIPAL/TEACHER CONFERENCE FORM 



Teacher 



Grade 



Date 



A. Information Collection 



la. What was the entering achievement level of 
the class? 

lb. What is your achievement goal for the class? 

1c. Are prior learning strengths and weaknesses 
(as identified on the School Year Planning 
Guide) addressed in short-term instructional 
plans? 

2a. How many content items have been covered 
to-date ? 

2b- At this rate, how many content items, will be 
covered by the time the te s t is administered ? 

2c. Assuming an 80 percent mastery rate, what is 
the predicted percentile rank for the class? 

3a • On the average, what percent of the class 
masters each curriculum unit? 

3b. Do short-term plans indicate that periodic 
review of previously mastered content is 
taking place? 

4a. What percent of the class is highly successful 
on dally work at least half of the tide? 

4b. What is the average student engaged time ? 

4c. What is the average allocated time ? 

4d. What is the average engagement rate ? 

4e. Students' unengaged behaviors were primarily 
in what category (M.S^U.O)? 



Reading/ 
Language Arts 

percentile 



B, Comparison and Identification 
Circle data that reflect an opportunity. 



percentile 



percentile 



jninutes 
minutes 
Z 



Math 



percentile 
^percentile 



percentile 



jninutes 
jninutes 
% 
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C. Selection and Preparation 



Describe strategies related to each opportunity. 



1. 


Attention to prior learning. 


2. 


Coverage of criterion content. 


3. 


Academic performance. 


4. 


Time spent. 



D. Improvement Plan (indicating what , when , where, and how ) 
Teacher will: 



Principal will: 

24 2{J 
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i-.i REM CONFERENCE PROGRAM 
2u AU* = "'/." 

30 %>. OPENrSC = <?: DIM S(SC) :W$ = 

"":KQS -- "" 
40 FOR S = 1 TO SC: S< INFO,S,L(S 

) : NEXT 3 
30 DIM D*(L(SO): DIM KQ*(L(SO) 

- 60 DIM SU<32) 
By) D* - CHR* <4) 

90 DIM G ( 12) , OP ( 13) , UN* ( 120) , U2$ 

( 1 20 ) , U3* ( 1 20 ) , U4* ( 1 20 ) 
100 REM INTRODUCTION 
110 HOME 

120 PRINT "PLEASE ENTER THE FOLL 
OWING INFORMATION:": PRINT : 
PRINT 
130 PRINT "1. "5 
140 INVERSE 
150 PRINT "TODAY'S "J 
1 60 NORMAL 

170 & POS FLD, 6,1: ?< PRTNAME, 3: 

PRINT : PRINT " ";: S< INPUT 
, TD*, 0 

180 IF LEN (TD*) = 0 THEN PRINT 
: PRINT "NO ENTRY MADE. TRY 
AGAIN.": PRINT : PRINT : GOTO 

1 70 

190 [F F9 = 1 THEN GOTO 300 
200 PRINT : PRINT : PRINT "2. "J 

210 fc POS FLD, 6,2: & PRTNAME, 3: 

PRINT : PRINT " ";: & INPUT 

,TC*,0: IF F9 = 1 THEN GOTO 

300 

220 PRINT : PRINT : PRINT "3. "; 
: ?< POS FLD, 6,3: S< PRTNAME, 
3: PRINT : PRINT " ";: ?< INPUT 
,S*,0: IF F9 = 1 THEN GOTO 

300 

230 PRINT : PRINT : PRINT "4. "J 
: 8< POS FLD, 6, 4: & PRTNAME, 
3: PRINT : PRINT " ";: & INPUT 
, G* , 0 

240 PRINT : PRINT : PRINT "5. 

?: & POS FLD, 6,5: & PRTNAME 
,3: print : print " ";: & 
INPUT ,CL*,0 

250 PRINT 

260 PRINT : PRINT "6 WOULD YOU L 
IKE A PRINTED": PRINT " SU 
MMARY OF THIS CONFERENCE? "5 
: ?< SEL,0,Y 

270 IF USR <0) = 1 THEN X* = "Y 

II 

\(^280 IF USR (0) = O THEN X$ = 11 N 



290 PRINT 

300 F9 = 0: PRINT "IS THIS CORREC 

T? " ; : ?< SEL , 0 , Y 
310 IF USR (0) = 0 THEN GOTO 3 

30 

320 IF USR (0) = 1 THEN GOTO 3 
40 

330 HOME : GOTO 110 
340 8< READ , 1 , D* < 1 > . KQ* 
344 IF USR (0) AND IT = 0 THEN 
HONE : VTAB 12: PRINT "THER 
E ARE NO TEST RECORDS FOR " : 

PRINT "GRADE ";G*;" ">: & POS 
FLD,6,3: S< PRINT ,S*: END 
350 P$ »'B* + S*:PK* = D*<1) + D* 
(2) 

360 IF P* < > PK* THEN GOTO 34 

0 

3 70 IT = VAL CD* (9) ) 

^80 & READ , 6,D* C 1 ) , KQ* 

385 IF USR CO) AND F2 = 0 THEN 
HOME : VTAB 12: PRINT "THbR 
E ARE NO TEACHER RECORDS FOR 
11 : & POS FLD,6,2: 8< PRINT 
„TC*: END 

390 KEY* = TC* + 3* + G* + CL*: IF 
KEY* < > D*(L(5) +2) + D* C 
L<5) + 3) + D*(L<5) + 4) + D 
*<LC5> + 5) THEN GOTO 380 
400 F2 = 1 

410 AC = VAL (D*CLC5) + 6)):GA = 

VAL (D* (L(5) + 7) ) 
420 TX* = D*CL<5) + 8):TS* = D*CL 

(5) + 9) 
440 HOME 

450 VTAB 12: PRINT TAB ( 13) j "PL 

EASE WAIT. . " 
460 PRINT TAB ( 10) 5 "COMPUTER WO 

RKING" 

470 & READ , 8, D* C 1 ) , KQ* ( 1 ) 
475 IF USR CO) AND F3 = 0 THEN 
HOME : VTAB 10: PRINT "THER 
E ARE NO MASTERY RECORDS FOR 
'•: ?< POS FLD,6,2: & PRINT 
,TC*= PRINT : PRINT "GRADE " 
;G*;" "?: ?< POS FLD,6::3: 8/ 

PRINT ,S*: PRINT : PRINT "C 
I ASS " ; CL*: END 
480 IF USR CO) THEN GOTO 610 
490 I-..2* - D*CLC7) + 1) + D*CLC7) + 
2'» + D*<L<7> + 3) + D*(L(7) + 
4) 

500 IK KEV* < > K2* THEN GOTO 
470 

510 VN = VN + 1 
515 F3 = 1 

520 IF VAL <D*CLC7> + (6 + VN) ) 
O ) > « 80 THEN SU = SU + 1 

ERIC 530 TF D*CLC7) + <6 + VN)) < > 
asasaxa »« THEN C - C + 1 



ERIC 



540 IF DS(L<7) + (6 + VN) ) < > 

"" THEN GOTO 510 
550 IF VAL (SQ*> < = VAL (D*( 

L(7) + 6)) THEN SQ* » D*(L<7 

) + 6>):u = u + i:un*(U) - D* 

CL<7) + 5) 
560 SU ■ < INT (<SU / C * 100) +' 
.5) ) 

570 BU<U) = SU:SU = 0: IF SU(U) < 

80 THEN NM = NM + 1 
'580 VN = 0: C = 0 

590 IF SQ* = "" THEN PRINT "THE 

RE ARE NO TEST RECORDS" : PRINT 

" FOR ";: & POS FLD, 8,1: 8< PRINT 

,TC* 
600 GOTO 470 

610 & READ ,2,D*(1> ,KQ*:NS - VAL 

(D*(L<1) + 1)):NT = VAL (D* 

(L (1 ) + 2) ) 
615 IF USR (0) AND NS = 0 AND N 

T = 0 THEN HOME : VTAB 12: PRINT 

"THERE IS NO CALENDAR FILE": 
END 

620 8< READ , 7, D* (1 ) , KQ* ( 1 ) 
635 IF USR (0) AND F4 = 0 THEN 
HUME : VTAB 12: PRINT "THER 

E ARE NC3 PLANNING GUIDE" : PRINT 

"RECORDS FOR GRADE ";G*;" "; 

: & POS FLD, 6,2: 8< PRINT , 

S*: END 

63/ IF USR (0) THEN GOTO 740 
640 K3* = D$(L(6) + 1) + D*(L<6) + 
2) + D$<L(6) + 3) + D*(L<6) + 

4) + D$(L(6) + 5) 

650 K4* = KEY$ + TX$: IF K3* < > 

K4* THEN GOTO 620 
655 F4 = 1 

660 FOR IC ■ 13 TO 37 STEP 4 
670 IF D*(L<6) + IC) = CHR* (11 

5) OR D*(L(6) + IC) = CHR$ 
(211) OR D*(L.(6) + IC) - CHR$ 
(119) OR D*(L(6) + IC) = CHR* 
(215) THEN SF ■ 1 

680 NEXT IC 

690 DT = DT + VAL (D*(L<6) +43) 
) :TS = TS + VAL <D$(L<6) + 
44) ) 

700 IF DT < = NI THEN NF = NP + 

VAL <D$(L<6> + 44) ) 
710 IF VAL (SQ*) > - VAL (D*( 

L(6) + 10)) THEN DY » DY + VAL 
(D*(L(6) + 43)):SK •- SK + VAL 
(D* (L (6) + 44) ) 
720 IF DT < NT THEN ST = ST + VAL BEST COPY AVAILABLE 
(D*(L(6) + 44)):S2$ ■ D$(L(6 
) + 1 0 ) ". 1 2 = 12 + l:U2*( 12) = 
D*(L(6) + 9) 
730 K5* = D1i(L(6) + 3) + D*<L<6) + 

2): 13 = 13 + l:U3$(I3) = D*< 29 
L(6) f 9) : GOTO 620 



740 SI = (<SK / TS) * 100) + .5:S 
1 - INT <S1 ) :S2 - ( (ST / TS 
) # 100) + . 5: S2 = INT (S2) 

750 HOME 

760 IF X* = " Y " THEN ?< PR# 
770 GOSUB 1540 

780 PRINT : PRINT TAB ( 13) "PRIO 

R LEARNING' : PRINT TAB ( 13) 

"**************" : PRINT 
790 PRINT "ENTERING ACH I EVEMENT- 

"5 AC;" ";AU* 
BOO PRINT : PRINT "GOAL ACHIEVEM 

ENT-" ; GA; " " ; AU* 
810 PRINT : PRINT "STRENGTHS AND 

WEAKNESSES HAVE " j 
820 IF SF = 0 THEN OP ( 1 ) = 1: PRINT 

"NOT "5 

830 PRINT "BEEN": PRINT "I DENT IF 

I ED ON YOUR SCHOOL YEAR": PRINT 
"PLANNING GUIDE" 

835 IF X* ■ " Y" THEN PRINT D$; " 
PRttO" 

840 VTAB 23: INPUT "PRESS RETURN 

TO CONTINUE. . . " ; M* 
845 IF X* = "Y" THEN PRINT D$; " 

PR#1": PRINT CHR$ (12) 
850 HOME : PRINT : PRINT TAB ( 1 
2) "CONTENT COVERAGE": PRINT 
TAB ( 12) "****************" I 
PRINT 

855 IF X* = "Y" THEN PRINT D*J " 
PRttO" 

860 PRINT "HOW MANY INSTRUCT I GNA 
L DAYS" : INPUT "HAVE BEEN US 
ED..";NI: PRINT : PRINT " HOW 

MANY INSTRUCTIONAL DAYS": INPUT 
"SINCE YOUR LAST UNIT TEST.. 
" ; in : N I - N I - UT 

865 IF X$ = "Y" THEN PR# 1 

870 PRINT 

880 PRINT "YOUR LAST UNIT TEST W 

AS ON UNIT ";UN*(U) 
890 PRINT : PRINT "YOU PLANNED 0 
N USING ";DY: PRINT "INSTRUC 
T I ON AL DAYS BY THAT DATE" 
900 PRINT : PRINT "YOU ACTUALLY 

USED " ;NIj" DAYS" 
910 IF NI > DY THEN PRINT : PRINT 
" YOU ARE ";NI - DYj" DAY";: IF 
NI - DY > 1 THEN PRINT "S"5 

IF NI > DY THEN PRINT " BEH 
IND YOUR PLANS" 

IF NI •:. DY THEN PRINT : PRINT 
•"yOU ARE " 5 DY - NI?" DAY" j : IF 
DY - NI > 1 THEN PRINT "S"5 

IF NI < DY THEN PRINT " AHE 
AD OF YOUR PLANS" 



920 
930 



ErJ(>K 



* 



950 IF NI - DY THEN PRINT : PRINT 
" YOU ARE IN AGREEMENT WITH Y 
OUR SYPG" 

955 PRINT D* 

956 IF X* = " Y" THEN PR# 0 
960 PRINT : PRINT : INPUT "PRESS 

RETURN TO CONT I NUE . . " ; BL* : HOME 

965 IF X* " Y" THEN PRINT D*5 " ' 
PR#1" 

970 PRINT : PRINT "YOU HAVE COVE 

RED ";Si;"*/: OF THE SKILLS": PRINT 
'THAT YOU PLANNED ON COVER IN 
G" : PRINT "BY TEST DATE" 

980 PRINT : PRINT "ACCORDING TO 
YOUR SYPG YOU WILL" : PRINT " 
COVER ";S2;"7. OF THOSE SKILL 
S BY TEST DATE " 

985 IF X* = "Y" THEN PRINT D*;" 
PR#0" 

990 FLASH : VTAB 10 
1000 HTAB 13: PRINT "WORKING" 
1010 NORMAL 

1 020 ?< READ , 4 , D * ( 1 ) , KQ* 
1025 IF USR (0) AND F5 = 0 THEN 
HOME : VTAB 12: PRINT "THER 

E IS NO CONTENT FILE FOR THI 

S CLASS": END 
J. 030 IF USR (0) THEN GOTO 1070 

1040 K6* ~ D*(L<3) + 1) + D*(L<3) 
+ 2) 

1050 IF K5* < > K6* THEN GOTO 

1020 
1055 F5 = 1 

1060 15 = 15 + l:U4*(I5) = D*(L(3 

) + 11) : GOTO 1020 
1070 16 = 13: FOR 13 = 1 TO 16 
1080 FOR 14= 1 TO 15 
1090 IF UN* (13) = "" THEN GOTO 

1 1 10 

1 100 IF UN* (13 

3 = C3 + 1 
1110 IF U2*(I3 

1 130 

1120 IF U2*(I3 
1 = CI + 1 
1130 IF U3*(I3 

1 150 
1140 IF U3*(I3 

2 = C2 + 1 
1150 NEXT 14: NEXT 13 
HoO EF = 7 

1170 CD = (C3 / IT) * 100 + .5: CD 

= INT (CD) 
1180 CT = (CI / IT) * 100 + .5:CT 

« INT (CT) 

1190 CY = (C2 / IT) * 100 + .5:CY »» 
INT (CY) 



U4*(I4) THEN C 
"" THEN GOTO 
U4*(I4) THEN C 
"" THEN GOTO 
U4*(I4) THEN C 



BEST COPY AVAUarif 



frit" ~ iNI (UY) 31 



1210 PRINT CHR$ (11) 
1215 IF X* = "Y" THEN PRINT D*J 
"PR#1" 

1220 print : print "coverage to 
date of items on test is ";c 
d; "•/." 

1230 print : print "coverage by 
test date is ";ct; "'/." 

1240 PRINT 

1250 PRINT : PRINT "COVERAGE BY 
THE END OF THE YEAR IS ";CY; 

it y ii 

1260 K6* = S$ + G$ + TS* 

1270 FOR I = 1 TO 100: NEXT I 

1280 CO = INT (CI * .8 + .5) 

1 290 & READ p 3, D* < 1 > , KQ* ( 1 ) 

1295 IF USR (0) AND F6 = 0 THEN 

HOME : VTAB 12: PRINT "THER 
E IS NO NORMS TABLE FOR THIS 

CLASS": END 
1300 IF USR (0) THEN GOTO 1370 ' 

1310 K7* = D*(L(2) + 2) + D*(L(2) 

+ 1) + D$(L<2) + 3) 
1320 IF K6* < > K7* THEN GOTO 

1290 
1325 F6 = 1 

1330 IF CO = VAL (D$(L(2) + S» ) 
THEN P = VAL (D*(L<2) + 9) 
) : FP = 1 

1340 IF VAL (D*(L(2) + 9)) < INT 
(GA / .8 + .5) THEN GOTO 12 
90 

1350 K - VAL (D*(L(2) + 8)) 

1360 IF FP < > 1 THEN GOTO 129 

0 

1365 IF X* = "Y" THEN PRINT D$5 
"PR#0" 

1370 VTAB 23: INPUT " PRESS RETUR 
N TO CONTINUE. . . ";BL* 

1375 IF X* = "Y" THEN PRINT D*5 
"PR#1" 

1380 HOME : PRINT : PRINT " PRED I ■ 
CTED ACHIEVEMENT GIVEN" : PRINT 
"COVERAGE TO TEST OF "5 CI 5" 
ITEMS": PRINT "AND 80"/. MASTE 
RY IS " ;P; SPC ( 1 ) ; "VALE" 

1390 PRINT 

1400 EF = 7 

141U IF P < GA - EF THEN OP (2) = 
l: PRINT : PRINT "TO REACH Y 
OUR ACHIEVEMENT GOAL OF " 5 GA 
;"7.": PRINT "YOU WILL NEED T 
0 INCREASE COVERAGE": PRINT 
"TO ";KJ" ITEMS (ASSUMING 80 
7. MASTERY)": GOTO 1450 
1420 OP (4) = 0 
9 14 50 PRINT : PRINT "THIS LEVEL 0 
JC F COVERAGE IS": PRINT "CONSI 

«aa STENT WITH YOUR ": PRINT "AC, 



HIEVEMENT GOAL OF ";GA;"7." 
1440 NORMAL : VTAB 23 
1450 IF X* = "Y" THEN PRINT D$S 

"PR#0" 

1455 VTAB 23: INPUT "PRESS RETUR ' 

N TO CONTINUE. . . " ; M* 
1460 HOME : VTAB 10 
1470 0010 1790 

1480 & POS FLD,6,l: PRINT "DATE 

"*,: ?•< PRINT , TD* 
1490 PRINT : PRINT M* 
1500 INPUT XX* 

1510 IF LEN (XX*) - 0 THEN PRINT 
: PRINT "NO ENTRY MADE. TRY A 
GAIN.": PRINT : GOTO 1490 

1520 IF LEN (XX*) > L THEN PRINT 
: PRINT "TOO long.";l; m char- 
acters ONLY.": PRINT : GOTO 
1490 

1530 RETURN 

1540 PRINT "TEACHER: "5 
1550 Z< POS FLD,6,2: S< PRINT , t 
C* 

1.560 PRINT : PRINT 

15"'0 PRINT "GRADE: "J 

1.580 S< POS FLD,6,4: 8< PRINT , G 

1590 PRINT : PRINT : PRINT "SUB J 
ECT: "5 

1600 & POS FLD,6,3: & PRINT ,S 
* 

1610 PRINT : PRINT 

1620 ?< POS FLD,6,l: PRINT "DATE 

: ";: & PRINT , TD* 
1630 PRINT : PRINT 
1 640 RETURN 

1650 ?< POS FLD,6,3: ?< PRINT ,S 
* 

1660 PRINT : PRINT M* 
1670 INPUT XX* 

1680 IF LEN (XX*) = 0 THEN PRINT 
: PRINT "NO ENTRY MADE. TRY A 
GAIN.": PRINT : GOTO 1660 

1690 IF ASC (XX*) < > 78 AND ASC 

(XX*) < > 89 THEN PRINT : PRINT 
" ENTRY MUST BE YES OR NO": PRINT 
: GOTO 1660 

1700 RETURN 

1770 NZ* - EA*(I,J 1): RETURN 

1780 N Z $ = EA*(I,J): RETURN 

1790 IF X* ■ "Y" THEN PRINT D$; 

"PR#1": PRINT CHR* (12) 
1 7<J-j U - 0 

1796 IF NM > 0 THEN OP (3) = 1 
1800 HOME : IF U + 1 > VAL <SQ$ 

) THEN GOTO 2000 
1810 HTAB 5: PRINT "TOPICS" 5 
q 1820 HVAB 18: PRINT "UNIT"; 
ERIC 1830 HTAB 27 ' PRINT DF CLASS" 



1840 HTAB 24: PRINT "REACHING MA 
STERY" 

1850 HTAB 25: PRINT "(807. OR BET 
TER) " 

I860 HTAB 24: PRINT " ON LAST UN I 
T TEST" 

1870 PRINT " ==================== 

: PRINT 

1880 IF U - 0 THEN 2< READ ,7,D 

$ < 1 ) , KQ$ ( 1 > , F 
1890 IF U > 0 THEN & READ ,7,D 

* ( 1 ) , KO.% ( 1 ) 
1900 IF USR (0) THEN GOTO 2000 



1910 K8$ = D*(L(6) + 1) + D*(L<6) 
+ 2) + D*(L(6) + 3) + D*(L< 

6) + 4) + D$(L<6) + 5) 
1920 IF K8$ < > K4* THEN GOTO 

1800 
1930 U = U + 1 
1940 IN = IN + 4 

1945 IF X* = "Y" AND D*(L<6) + < 

7 + IN)) = "" THEN PRINT TAB ( 
20) ;D$(L(6) + 9); TAB ( 31) ;s 
U(U):IN = 0: PRINT D*; "PR#0" 
: VTAB 23: INPUT "PRESS RETU 
RN TO CONTINUE. BL$: PRINT 
D*5"PR#1": PRINT CHR* (12): 
GOTO 1800 

194(3 IF X* - "Y" AND D*(L(6) + ( 
7 + IN)) = "" THEN PRINT D* 
;"PR#1": PRINT CHR* (12): GOTO 1 
1 BOO 

1950 IF D*(L(6) + (7 + IN) ) = "" 

THEN VTAB 10: HTAB 20: PRINT 
D*<L(6) + 9): VTAB 10: HTAB 
31: PRINT SU(U):IN = 0: VTAB 
23: INPUT "PRESS RETURN TO C 
ONTINUE. . . ";BL*: GOTO 1800 

1960 ?< POS FLD,7,7 + IN: POKE 9 

> 0 
s. 



PRINT ,D*<L<6) + (7 + IN 



PRINT D*j 



1970 a 
) ) 

1980 PRINT 
1990 GOTO 1940 
2<\>0 IF X* = "Y" THEN 

"PR#0" 
2005 HONE : VTAB 13 
2010 PRINT TAB ( 18) ; "TIME" 
2020 PRINT TAB ( 18) J "****" 
2030 PRINT D$ ; "BLOAD CHAIN, A520" 



2040 CALL 520"C0NF. PART3" 



]PR#" 
3LXST 



CHR* (4) 
DIM T*(13, 12) , AV(3) ,11(5) ,C*(5 



3[) 

BEST COPY AVAILABLE 

34 



50 
60 
6000 
6001 
6005 
6006 



) 

DIM 
DIM 



LI (10) , C0UO) 
T2* ( 13, 12) 



REM TIME 
C = 0 

& READ ,9,D$<1) , KQ$ ( 1 ) 
IF USR (0) AND F7 = 0 THEN 
HOME : VTAB 12: PRINT "THER 
E ARE NO TIME OBSERVATIONS": 
PRINT "FOR THIS CLASS": END 



6010 IF USR (0) THEN GOTO 6100 



6015 K9$ = 
+■ 2) 
8) + 4) 
IF K9* 
6005 
F7 = 1 
T*<C,0) 
T$(C, 1) 
T*<C,2) 
T*(C,3) 
T$ <C,4) 
T$(C, 5) 
f* (C,6) 
T*(C, 7) 
T*(C,S) 
T*(C, 9) 
T*(C,10) = 



D$ (L <8) + 
+ D*(L(8) 



1 ) 
+ 



+ 

3) 



D*(L<8) 
+ D*(L< 



6020 

6025 
6030 
6035 
6040 
6050 
6055 
6060 
6065 
6070 
6075 
6080 
6085 
6090 
6091 
6095 
6 IO0 
6 1 0 1 

6102 
6104 

6105 



KEY* THEN GOTO 



D*(L<8) 
D*(L<8) 
D*(L(8) 
D$ (L (8) 
D$(L (8) 
D$ (L (8) 
D*(L<8) 
D* (L (8) 
D$ <L (8) 
D$ (L (8) 
D$(L <8) 



5) 
6) 
7) 
8) 
9) 
10) 
1 1 ) 
12) 
13) 
14) 
+ 15) 
+ 16) 



T$<C, 11) = D*(L(8) 
C = C + 1 

GOTO 6005 
C « C - 1 

IF X* = "Y" THEN PRINT D$; 
"PR#1 " 

FOR V = 0 TO C 

HOME : PRINT "THE 

OBSERVATION DATA" 

PRINT " HAVE BEEN 



FOLLOWING 

recorded: " 



6106 PRINT 



PRINT- 



PRINT ,T$< 



: PRINT 
6 J 10 Z>. POS FLD, 9, 5 
. 6113 Z>. PRTNAME , 2 

6114 POKE 9,0 

6115 PRINT "...";: s 
V , 0 ) 

6120 PRINT : S< POS FLD, 9, 6 
6L22 8< PRTNAME, 2 
6124 POKE 9,0 

612b PRINT "...";: S< PRINT , T$ ( 
V, 1) 

6130 PRINT : 2< POS FLD ,9,7 
6132 ?< PRTNAME, 2 
6134 POKE 9,0 
q 6135 PRINT "...";: 8< PRINT , T* ( 

ERIC v ' 2) 

m^sa 6140 PRINT : ?< POS FLD, 9, 8 



6142 


& PRTNAME, 2 






6143 


POKE 9 , 0 






6145 


PRINT i 


>i PRINT 






V, 3) 






6150 


PRINT : PRINT 


: & pos 


FLD, 




9,9 






6152 


?< PRTNAME, 2 






6153 


POKE 9,0 






6155 


PRINT " ; ' 


PR TNT 






V, 4) 






6 1 60 


PRINT : ?•/ pns 






6162 


& PRTNAME ^ 






6163 








6165 


PRINT " " : • 


*/ PR T WT 


T* ( 




V, 5) 






6170 


PRINT : & Pncj 


Fl X) 9 11 




6172 


& PRTNAME, 2 






6173 


POKE 9,0 






6175 


PRINT 11 " : ' 


?< PRINT 


,T$< 




V, 6) 




6180 


PRINT : ?>/ POS 


FLD , 9 , 12 


6182 


& PRTNAME 2 






6183 


POKE 9,0 






6185 


PRINT " . . " ; : 


?< PRINT 


, T* ( 




V. 7) 

5 






6190 


PRINT : PRINT 


: S< POS 


FLD, 




9, 13 






6192 


& PRTNAME, 2 






6 1 93 


POKE 9,0 






61 95 


PRINT 


& PRINT 


, Tf. (. 



V,8) 

620U PRINT : & POS FLD, 9, 14 

6202 fk PRTNAME, 2 

6203 POKE 9,0 

6205 PRINT & PRINT , T* < 

V, 9) 

6210 PRINT : S< POS FLD, 9,15 
6212 & PRTNAME, 2 
621.3 POKE 9,0 

6215 PRINT & PRINT , T* ( 

V, 10) 

6220 PRINT : & POS FLD, 9,16 

6222 ?/. PRTNAME, 2 

6223 POKE 9,0 

6224 PRINT ?< PRINT , T* < 
V, 1 1 ) 

6225 IF X$ = "Y" THEN PR# 0 

6226 PRINT : VTAB 23: INPUT "PRE 
SS RETURN TO CONTINUE. . . " ; BL 
$ 

6227 IF X* = "Y" THEN PRINT D$; 
"PR#1": PRINT CHR* (12) 

6228 NEX 1 V 

6229 FOR I ~ 0 TO C 

6240 T*(I,9) = STR* ( INT (100 * 

VAL (T$(I,9) ) + .5) ) 
6245 1*(I,10) = STR* ( INT ( VAL 
^ (T*(I, 10) ) + .5) ) 

CD 1/^6260 T*(I,11) = STR* ( INT ( VAL 
U^U-, (T*(l, 11) ) + .5) ) 



6270 AV<0) = AV(0) + VAL (T*(I,1 

0) ) 

6280 AV<1) « flV(i) + VAL <T*(I,9 
) ) 

6290 AV(2) = AV(2) + VAL < T* < 1 , 1 

1) ) 

6295 IF VAL (T*(I,10)) > TH THEN 

TH = VAL (T*(I S 10) ) 
6300 NEXT I 
6310 FOR I = 0 TO 2 
6320 AV(I) = AV(I) / (C + 1) 
6330 AV(I) = I NT (AV(I) + .5) 
6340 NEXT I 

6345 IF X* = " Y" THEN PRINT D*; 

"PR#1" 
6350 HOME : PRINT 

6360 PRINT TAB ( 14) "SUMMARY SHE 

ET": PRINT 
6370 PRINT " DATE OBSVR PRT A 

T"; SPC< 5);"ER"; SPC< 5) ; "S 

ET" 

6375 FOR I = 0 TO C 

6380 PRINT : ?< POS FLD,9,5: POKE 

9,0: & PRINT ,T*(I,0) 
6390 PRINT SPC( 2) 

6400 ?< POS FLD,9,6: POKE 9,0: 8< 
PRINT ,T*(i,l) 

6401 PRINT SPC (3) 

6402 8< POS FLD,9,7 : POKE 9,0: 8< 
PRINT ,T$<I,2) 

6404 PRINT TAB ( 20 ) T$ (1,10)5" M 
IN "; 

6406 PRINT T*(I,9) ; "7."5 SPC < 2); 

6408 PRINT T*(I,11)5" M I N " 
6410 NEXT I 

6420 I = 20: IF AV(O) •< 100 THEN 
I = 21 

6430 J == 2: IF AV(2) < 100 THEN J" 

6440 PRINT : PRINT TAB ( 7) "AVER 
AGES " ; TAB ( I); AV ( 0 ) 5 " M I N 
"; AV(i) ; ""/."; SPC ( J);A.V(2):" 
MIN" 

6445 IF X* ■ " Y" THEN PRINT D$; 
"PR#0" 

6450 PRINT : PRINT : INPUT "PRES 

S RETURN TO CONTINUE. M$ 
6565 PRINT D*S "BLOAD CHAIN, A520" • 

6570 CALL 520"TIME2" 

DPf<#M 

JLIiil 

30 m ~ UHR'S (4) 
6000 REM TIME 

67 /O C-fc ( 0 • = " M " ; c<$ (i) = "U":C*(2 
ERXC '' = " S " :C$(3) = "D":c$(4) = 
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6 772 DIM AL(ll) , ER ( 1 1 ) 

6780 DATA 6, "A— GR. 1 READING 

/LANG", 3, 38, 110, 130,210, 10 
6790 DATA "B — GR.3 READING/LAN 

G", 5, 48,88, 113, 170, 198,205, 1 

JL 

6800 DATA "C — GR.5 READING/LAN 

G" , 3, 40, 78, 92, 135,7 
6810 DATA "D--GR.1 MATH" ,5,5,3 

4,46, 140, 152, 165,6 
6820 DATA "E— GR.3 MATH" ,3,8,4 

6,61, 108,8 
6830 DATA "F — GR.5 MATH" , 2 17, 

32,46,99 
6840 READ Fl 
6850 FOR I = 1 TO Fl 
6860 READ ZZ*(I) ,K(I) 
6870 FOR J = 1 TO K ( I ) + 1 
6880 READ CA(I,J) 

6890 NEXT J 

6891 EA*<I,1) = "TIME BELOW RANGE 

ii 

6892 EA*(I,2) = "BELOW EXPECTED A 
CHIEVEMENT LEVEL" 

6893 EA*(I,3) = "AT EXPECTED ACHI 
EVEMENT LEVEL" 

6894 EA*(I-4> = "ABOVE EXPECTED A 
CH EVEMENT LEVEL " 

6895 EA*(I,5) = "TIME ABOVE RANGE 

II 



6896 IF K ( I .) 
900 

6897 EA*(1,2) 
GE " 

6898 LA* (1,3) 
GE " 

6899 EA*<I,4) 
10 

6900 IF K(I) 



> 2 THEN GOTO 6 
= "TIME BELOW A VERA 
= "TIME ABOVE AVERA 
= EA*<I,5) : GOTO 69 
= 3 THEN GOTO 6910 



6901 EA*(I,7) = EA*(I,5) 

6902 EA* (I , 6 ) - EA* (1,2): EA* ( I , 5 ) 
~ EA*<I,3) 

6910 READ MC(I) 
6920 NEXT I 

6925 HOME : M* - "IS THIS AN ELEM 
ENTARY CLASS? ": GOSUB 19080 

:xi* - xx* 

6927 IF ASC (XI*) = 78 THEN YX* 

- m 6":k<I> = 1 :CA(i, l) = 10 

:CA(I,2) - IK. EA*(I, 1) = "T 
I ME BELOW RANGE":EA*(I,2) = 
"TIME IN RANGE":EA*(I,3) = " 
TIME ABOV'i RANGE" : MC ( I ) - 99 
: GOTO 7410 
6930 HOME : PRINT "THE FOLLOWING 

COMPARISON OPTIONS": PRINT ,JJ 

•^940 "roR TAZo% : FRINT BEST COPY AVAIUBIE 

950 PRINT : PRINT ZZ*U) 38 



6960 NEXT I 

6970 PRINT : PRINT "WHICH OPTION 
DO YOU WANT TO USE? ": INPUT 

"(TYPE ONE LETTER) " j YX* 
699<> REM DATA ANALYSIS 
7060 IF X* = "Y" THEN PRINT D*; 

"PR#1": PRINT CHR* (12) 
7410 PRINT : PRINT : HONE : PRINT 

8230 PRINT TAB ( 16) "COMPARISON" 

8290 Li- ASC (XI*) = 78 THEN GOTO 
8840 

8300 NG = AV(2):- 60SUB 19860: E* = 
NZ* 

8305 IF MC = 99 THEN MC = 0 

8306 JH = J 

8310 PRINT : PRINT : PRINT "ENTE 
RING ACHIEVEMENT OF": PRINT 
"YOUR CLASS IS " j AC ; " V. " 

8311 PRINT : PRINT " YOUR ACHIEVE 
MEN T GOAL IS " ; GAj "7." 

83 Ji PRINT : PRINT "AVERAGE STUD 
ENT ENGAGED TIME IS ";AV<2)5 
" MIN. ": PRINT E$ 

83.13 IP X* - "Y" THEN PRINT D*5 
"PRttO" 

8315 IF E* = "TIME BELOW RANGE " OR 
E* = "TIME BELOW AVERAGE " OR 
LEFT* >', E* , 5 ) = "BELOW" THEN 
CP (4) = l: GOSUB 19930 

8336 IF LEFT* (E$,2) = "AT" THEN 
GOSUB 19965 

8337 IF LEFT* <E*,5) = "ABOVE" THEN 
GOSUB 20000 

8338 IF (K(I) < - 3) OR JH \ - 
3 THEN GOTO 8354 

8339 IF VAL (AZ*> - 1 AND LEFT* 
(E*,5) = "ABOVE" THEN GOTO 
8370 

8340 IF VAL <AZ*> = 2 AND* LEFT* 
<E*,5) = "ABOVE" THEN GOTO 
8360 

8341 PRINT : PRINT "THIS ZONE BE 
GINS AT ";CA(I,JH - 1) - 1: PRINT 
"AND GOES DOWN TO ";CA(I,JH - 

2) 

8345 GOTO 8360 

8:554 IF VAL (AZ*) - 1 THEN NG ■ 
AV (2) : GOTO 8370 

8355 IF VAL (AZ*) = 2 THEN GOTO 
8360 

8356 PRINT "THIS ZONE BEGINS AT 
" i CA ( I , J ) 

8360 PRINT :M* = "WHAT IS YOUR S 
TUDENT ENGAGED TIME GOAL? ": 
i. - 3: GOSUB 19000: NG = VAL 
(XX*) 

H370 GOSUB 19860: HOME : PRINT " 

YOUR GOAL IS " ; NG; " MIN.": PRINT 



: PRINT "EXPECTED ACHIEVEMEN 
T: ": PRINT NZ$: PRINT 
8380 M* » "IS THIS THE GOAL YOU I 
NTENDED? ": GOSUB 19080: IF 
ASC (XX*) = 78 GOTO 8360 

8382 ER = AV ( 1 ) 

8383 IF AVC1) < 80 THEN ER = 79 

8384 IF AV(l) > = 90 THEN PRINT 
"YOUR CLASS'S ENGAGEMENT RAT 
E IS GOOD": GOTO 8420 

8385 DF = 90 - ER 

8386 HOME : PRINT "IN ORDER TO A 
TTAIN YOUR SET GOAL OF ";NG: 

PRINT " YOU CAN USE ANY OF T 
HE FOLLOWING": PRINT "COMB IN 
AT IONS: " 

8387 PRINT : PRINT " ENGAGEMEN 
T RATE ALLOCATED TIME " 

8388 PRINT " *************** 

**************** 
8390 FOR Z = 1 TO DF 

8394 ER = ER + 1 

8395 ER(Z) = ER 

840O AL(Z) = NG / ER(Z) * 100: AL ( 

Z) = INT (AL(Z) + .5) 
8408 PRINT Zj" ."; TAB ( 9);ER(Z); 

TAB < 28);AL(Z) 
84 K> NEXT Z 
8415 PRINT : PRINT 

8420 PRINT : PRINT : PRINT "YOUR 
SELECTION? (1 TO " ; Z - 15") 



;rjc 



8421 INPUT ". . "5 CN* 

8424 IF VAL (CN*) < 1 OR VAL ( 

CN* ) > Z THEN PRINT "PLEASE 
ENTER 1 TO " ; Z - 1 5 '. GOTO 8 

421 

842ft AL - AL ( VAL <CN*)):ER = ER ( 

VAL (CN*)) 
8430 VTA E( (23) : INPUT "PRESS RET 

URN TO CONTINUE. " ; BL* 
844? REM UNENGAGED BEHAVIORS . 
8550 HOME : PRINT "UNENGAGED BEH 

AVIORS WILL BE TOTALED": PRINT 

"FOR THE MOST RECENT OBSERVA 

TIONS. " 

EI560 PRINT "HOW MANY OBSERVATION 
3 SHOULD BE": INPUT "INCLUDE 
D? " J 1 1 

85/0 IF 11 > C + 1 OR II < 0 THEN 
PRINT : PRINT "VALUE MUST B 
E BE" TWEEN 1 AND " 5 C + 1 : GOTO 
8560 

8580 FOR 1=0 TO II - 1 

8590 U(0) = U(O) + VAL (T*( 1,4)) 

8600 U(l) = U(l) + VAL <T*<I,7>) 

3610 U(2) = U(2) + VAL <T*(I,5)> 
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*,0 



861*0 11(3) = U(3) + VAL (T*(I,6)) 



863<> LK4! = U(4) + VAL <T*(I,B)) 



8640 
8650 
8660 
8670 

8680 

8690 

8700 
8710 
8720 
8725 

S 73U 



8740 
8750 
376v 

3770 



8780 
8 79o 
8800 



88 1U 
8325 

8830 

8835 
883 7 
8838 

084':) 



NEXT I 
F = 0 

FOR I =' 0 TO 3 

IF LI (I) > = UU + 1) THEN 

GO TO 8710 
S = u ( i ) : u ( i ) = u ( I + i ) : u ( i 

+ l ) = s 

7$ = c«(i) :c*(i) = c*(i + i) 
:c*(i + i) = z$ 

F « 1 
NEXT I 

IF F = 1 THEN GOTO 8650 
IF X$ - "Y" THEN PRINT D*; 

"PR#1' S : PRINT CHR* (12) 
PRINT : PRINT "UNENGAGED BE 

HAV I OR " ; SPC ( 5)5 " FREQUENCY " 

PRINT 

F'CJR I - 0 TO 4 

IF C$<I> ■ " M " THEN PRINT 
" MOM r /TRANS " ; TAB ( 26 ) ; U ( I ) 

IF C$(I) = "S" THEN PRINT 
" SOU i AL. I Z I NG " ; TAB ( 26 ) : U < 1 ) 

JF C*<1) = " D " THEN PRINT 
" D I SO I PL I NE " ; TAB ( 26 ) ; U ( I ). 

IF C-T>(I) = -u" THEN PRINT 
"UNUCC/OBS"! TAB ( 26);U(I) 

IF C*(I) - "0" THEN PRINT 
"OUT OF ROOM"; TAB < 26);IJ(I) 



NEXT f 
IF X* = 



Y" THEN PRINT D$; 



8850 
8860 



88 .>o 
888o 



ERJC mu * 



"PR#0" 

PRINT : PRINT : INPUT "PRES 
S RETURN TO CONTINUE" ; M* 
GOTO 8910 
REM 

REM SECONDARY LEVEL ANALYS ' 
IS 
REM 

M* = "WHAT IS SCHEDULED TIME 
" ? ":L « 3: GOSUB 19000:AL « 
VAL (XX*) 

IF (AL < AV(O) - 5) OR (AL > 
AV (O; f 5i THEN OP < 10) = 1 

IF AV(1) > - 85 THEN PRINT 
: PRINT " YOUR CLASS ' S ENG.RA 
TE l'o GOOD" : GO TO 8890 

UP 'TM - l; Qp (12) a 1 

PRINT : PRINT " YOU SHOULD P 
ROB ABLY TRY TO INCREASE": PRINT 
" YOUR ENGAGEMENT RATE OF "; 
AV(l'.;"7." 
ITU 1ST : INPUT " WHAT IS YOUR 
ENGAGEMENT RATE GOAL? " ; ER 
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B3V-.1 - INT (AL * ER / 100 + . 

5) 

8700 IF <NG < AV<2) - 5) OR (NG > ' 

AV(2) + 5) THEN QP(4) = 1 
8902 PRINT : PRINT "RESULTING ST 

.ENG. TIME GOAL IS " ; NG; " M IN 

{1904 PRINT : PRINT : INPUT "PRES 

S RETURN TO CONTINUE" ;M* 
8910 IF X* - "Y" THEN PRINT D*; 

"PR#1" 

S911 IF X* = "Y" THEN PRINT CHR* 

< J.2) 

8918 HOME : PRINT : PRINT 

8920 PRINT "YOUR TIME GOALS ARE: 

ii 

8930 PRINT ". PRINT TAB ( 5); "ST. 

ENG. TIME = " ;NG; " MIN. " 
8940 PRINT : PRINT TAB ( 5) j "ENG ' 

.RATE ■ ";er; "*/." 
3950 PRINT : PRINT TAB< 5) 5 "ALL 

OC. TIME = "5 AL; " MIN. " 

8955 IF" NG > AV<2) THEN 0P<4) ■ 
1 

8956 IF AL > AV(O) THEN OP (5) = 
1 

8957 IF ER > AV ( 1 ) THEN OP ( 6 ) - 
1 

8960 PRINT D*;"BLOAD CHAIN, A520" 

897< * CALL 520 " CONF . PART4 " 
8980 GOTO 19999 
8990 END 

190U0 PRINT : PRINT M* 
19010 INPUT XX* 

J.902U IF LEN (XX*) = 0 THEN PRINT 

: PRINT "NO ENTRY MADE. TRY A 

GAIN.": PRINT : GOTO 19000 
19030 IF LEN (XX*) > L THEN PRINT 

: PRINT "TOO L0N6.";L;" CHAR 

ACTERS ONLY.": PRINT : GOTO 

19000 
19040 RETURN 
19080 PRINT : PRINT M* 
19090 INPUT XX* 

19100 IF LEN (XX*) = 0 THEN PRINT 

: PRINT "NO ENTRY MADE. TRY A 

GAIN.": PRINT : GOTO 19080 
19110 IF ASC (XX*) < > 73 AND 

ASC (XX*) < > 89 THEN PRINT 

: PRINT "ENTRY MUST BE YES 0 

R NO" : PRINT : GOTO 19080 
19120 RETURN 

1986',) REM FIND ZONE NZ* CORRES. 

10 COV/ ST. ENG. TIME NG 
19870 I ~ ASC (YX*) ~ 64 

198/5 MC •= MC( I) /| {) 

a 1988(1 FOR J = 1 TO K ( I ) +1 

FRir 19891 ' IF NG <: CA(I ' J) THEN GOT0 BEST COPY AVAILABLE 

bJZ&L 19920 42 



19900 NEXT J 

19905 NZ* = EA*<I,J + 1) 

19910 IF NZ* = "'" THEN NZ$ = EA$ 
( I , J - 1 ) : J = JH: RETURN 

19920 NZ* = EA*(I,J): RETURN 

19930 REM BELOW ZONE 

19940 IF AC > = 80 THEN PRINT 
: PRINT "yOU SHOULD MOVE TO 
A T LEAST THE AT ZONE" : J = 2 

19950 IT AC < 80 THEN PRINT : PRINT 
"YOU SHOULD MOVE TO THE ABOV 
E ZONE": J = 3 : J H = JH - 1 

19955 NZ* - EA*(I,J) 

19960 RETURN 

19965 _ REM AT ZONE 

19970 IF AC !? = 80 THEN PRINT 
: PRINT "IT'S OK TO REMAIN I 
N THE AT ZONE": PRINT "DO YO 
U WANT TO:": PRINT : PRINT " 
1) REMAIN IN THE AT ZONE": PRINT 
: PRINT "2) MOVE TO THE ABOVE 
ZONE" 

19975 IF AC > - SO THEN PRINT 
: INPUT " PLEASE ENTER 1 OR 2 
.."} A Z*: IF VAL (AZ*) < 
1 AND VAL (AZ$) < > 2 THEN 
GO 10 19975 

199/6 IK AC > = 80 AND VAL (AZ 
*> ■-- 2 THEN J = 3: PRINT " TH 
IS ZONE BEGINS AT " ; CA ( I , J ) 

199/7 IF AC > = 80 THEN GOTO 1 
9990 

19980 IF AC < 80 THEN PRINT : PRINT 
"YOU SHOULD MOVE TO THE ABOV 
E ZONE":. J = 3 
1V985 NZ* = EA*<I,JJ 
19990 RETURN 
2O00O REM ABOVE ZONE 
2O005 PRINT "DO YOU WANT TO:" 
20015 PR TNT : PRINT "D REMAIN WH 
ERE f'OU ARE IN THE ABOVE ZON 
E": PRINT "2) MOVE HIGHER IN 
I'HE ABOVE ZONE": PRINT : INPUT 
"PLEASE ENTER 1 OR 2. .";AZ*: 

IV VAL (AZ$) < > 1 AND VAL 
(AZ*) < > 2 THEN GOTO 2001 

200 . >o RE TURN 

:ipr#.) 

Jl T81 

]..)....(.), Rt;M SUMMARY OF CONFERENCE 

10010 IF- X* » "Y" THEN PRINT D* 
; "PR 1+1": PRINT CHR* (12) 

10017 PR [ NT : PRINT : HOME 
d 10014 PRINT TAB ( 1 2 )" CONFERENCE 
\Q SUMMARY" 

feaul0ol6 PKJNT TAB < 12) "*******### 



***** * **" 
10018 PRINT 

10020 PRINT "YOU HAVE IDENTIFIED 
IMPROVEMENT": PRINT "OPPORT 
UNITIES IN THE FOLLOWING ARE 
AS: " 

10O4O IF 0P(1) - 1 THEN PRINT : 
PRINT SPC( 5) j "PRIOR LEARN 
I NG: ADDRESSING": PRINT SPC ( 
5) ; "STRENGTHS S< WEAKNESSES I 
N " : PRINT SPG( 5) ; "UNIT PL A 
NS" ! 
10050 IF OP (2) = 1 THEN PRINT : , i 
PI I NT SPC( 5) ; "COVERAGE Of 
CR I TIER I ON-RELATED " : PR I NT. SPC ( 
7) : " CONTENT " 
10'..) 70 IF OP (3) = 1 THEN PRINT : 
PRINT SPC( 5); "MASTERY OF 
CONTENT UNITS": PRINT SPC ( 
5); "IN " j NM ; " OUT OF ";U;" T 
OP ICS" 

10090 IF OP (4) = 1 THEN PRINT : 
PRINT SPCC 5)5 "STUDENT ENG 
AGED- TIME" 
101.00 IF OP (5) = 1 THEN PRINT : 
PRINT SPC ( 5) ; "ALLOCATED T 
I ME" 

10110 IF OP (6) = 1 THEN PRINT : 
PRINT SPC c 5) ; "ENGAGEMENT 
RAVE — -": PRINT SPCC 7)","M0S 
T FREQUENT UNENG . BEH " C* ( 

0) 

10 120 (F ASC (X*) = 89 THEN PRINT 
D*5 "PR#<V 

10121 VTAB 24': INPUT "PRESS < RET 
URN> TO CONTINUE. . ."; BL* 

10JT2 HOME 

U)i 25 PRINT : PRINT " WHAT AREAS 
WOULD YOU LIKE TO IMPROVE IN 

1 O 1 'M i PR I NT SPG ( 5 ) " 1 ) PR I OR LE 

ARMING: ADDRESSING" 
1 0 .1 4- ) PR I NT SPC ( 8 ) "STRENGTHS A 

ND WEAKNESSES IN" 
10 ISO PRIN'I SPC< 8) M LESS0N PLAN 

S" 

to 155 PRINT 

10 1.60 PRINT SPG( 5) "2) COVERAGE 

OF CR ITER ION-RELATED 11 
1 0 1 7< > PR [ NT SPC ( B ) " CONTENT " 
101 /5 PR TNT 

1 0 1 SO PR I NT SPC ( 5 ) " 3 ) MASTERY 

Of CONTEN'l UNITS" 
lOLKL) PRINT 

1 0 1 9u PR I NT SPC ( 5 ) " 4 ) STUDENT 

ENGAGED TIME" 
1019] PRINT 

1019':j PRINT : PRINT SPCC 5) "5) 



ENTER YOUR OWN COMMENTS " 
PRINT 



UJX9S F-'RINT SPC( 5) "6) END CONF 
FIRLNCE" 

10200 PRIN1 : PRINT : PRINT 11 YOU 

R SELECTION?" 
lu^'JI ROW = PEEK (37): VTAB ROW: 
HThB 18 

1020;: i,et s* 

lOJO'". IF" VAL <S$) •: 1 GR VAL ( 
S$) • 6 THEN GOTO 10202 

10206 PRINT S* 

10207 VTAB 24: HTAB 1: INPUT "PR 
ESS < RETURN > TO CONTINUE. - - " 
; BL$ 

1U21U ON VAL <S$) GQSUB 11000,1 
2000, 13000, 14000, 19000,25000 

102 lt5 GO TO 10122 

10290 HOME : PRINT "THIS IS THE 

END OF ■ PRINT "THE CONFERE 

NCE PROGRAM. " 
1.O30O PRINT : PR I NT "TWO CONFERE 

NCE TASKS REMAIN": PRINT "TO 
BE COMPLETED. " 
10310 PRINT : PRINT SPC ( 5) 5 " U 

> CHOOSE THE AREAS THAT YOU 

WAN1 " : PR I NT SPC ( 9) ; "TO t M 

PUGVL UPON" 
1032',- PR IN I : PRINT SPC ( 5) ; " (2 

) DESCRIBE THE IMPROVEMENT P 

LAN, 11 

I»j33u PRINT SPC( 9) ; " INDICATING 
WHAT, WHEN,": PRINT SPC ( 9) 
; "WHERE, AND HOW. " 
L0340 END 

1100U HOME : PRINT SPC ( 5) "SUGG 
EST IONS FOR IMPROVEMENT IN" 

UOOS PRINT SPC( 3) "DETERMINING 
STRENGTHS AND WEAKNESSES" 

1 U>0ci D$(L(5) + 20) = "" 

11007 D$<L<5) +21) = "" 

1 100a D* (L (6) + 22) = 

i 101m FOR X = 1 TO 39 

1 1020 PRINT 

1103m ncxt X 

11O40 PRINT : PRINT 

tlOSCi PRINT "1) DETERMINE FROM L 
AST YEAR ? S ITEM" 

11060 PRINT SPC< 3) "ANALYSIS OR 
GROUP ANALYSIS REPORT" 

1107O INI SPC ( 3) "FROM STANDA 

I < U ] 7ED 1 EST" 

1 R> 75 PR INI 

llUtf'J PRj.Nl "2) DETERMINE FROM L 

AST YEAR ■ S TEST" 
1 t» »H! \ PR j N r 

1KI9U PR l NT M 3) DISCUSS WITH LAS 

I YEAR'S TEACHER'S) 
1 lOV::. PRINT 

■v. L L Ou PR ! NT 11 4 > G I VE 0 1 AGNOST I C 
i I Li.) I A I BEGINNING OF" 



4u 
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11110 PRINT SPC( 3) "YEAR" 
U llo VTAB 21 

11130 PR [ NT "ENTER UP TO THREE S 

TRATEGIES, OR " 
1114-j PRINT "PRESS <R> TO RETURN 

TO MENU" 
1 1 150 V I AB 22: HTAB 30 
1 1 15' i L 0:X = 30 
1 1 1 60 C - C + 1 

11170 IF C = 4 THEN C = 0: GOTO 
1 1 200 

11 ISO VTAB 22: HTAB X: GET A* 

11190 IF A$ = M R" THEN GOTO 112 

00 

11191 IF VAL (A*) < 1 OR VAL ( 
A*) > 4 THEN GOTO 11180 

11192 PRINT A$ 

11195 IF C = 1 THEN D*(L<5) + 20 
) = A$: X = 33 

11196 IF C « 2 THEN D*(L(S) + 21 
) = A$: X = 36 

11 1*9/ IF C = 3 THEN D*(L(5) + 22 

) = A$: X = 39 
3 1199 GOTO 11160 
1 1200 VTAB 24: HTAB 1 
11210 FOR Z = 1 TO 2000: NEXT Z: 
RETURN 

120nn HOME : PRINT SPC ( 5) "SUGG 

EST IONS FOR IMPROVEMENT IN" 
12001. D*(L<5) + 24) = "" 
12001' D*(L(5) +25) = " 
l'^U03 D*(L<5) + 26) = 1111 
12010 PRINT SPC( 14) "COVERAGE" 
12O20 FOR Z = 1 TO 39 
12030 PRINT "*"5 
12040 NEXT Z 
12US0 PRINT : PRINT 
12o6ti PRINT "1) SPEND LESS TIME 

ON SKILLS RELATING" 
1 207O PR I NT SPC ( 3 ) " TO CLASS ? S 

PRIOR LEARNING STRENGTHS" 
1208O PRINT "2) REARRANGE TOPICS 

TO TEACH UNTESTED" 
1 209' l PR 1 NT SPC ( 3 ) " SK I LLS AFTE 

R Tlr ST" 

12100 PRINT "3) COVER ONLY CORE 

SKILLS IN EACH" 
12110 PRINT SPC< 3) "CHAPTER" 
i:.'1.20 f*h INT "4 ) INCREASE THE TIM 

t. T Ati IDE FOR" 

1 2 1 >' ) PR I N I SPC ( 3 ) " I NSTRUCT ION 

> i 

121 <h PRINT "5) INCREASE GENERAL 

I -ACE OF INSTRUCTION" 
J'.'15»> PI- INI "6) RE SEARCH MOST EF 

F'ICIEM T AND" 
12160 PRINT SPC( 3) "EFFECTIVE T 
q EACH I NG FOR SPECIFIC" 

ERIC 1 7(1 PRINT SPC< 3) "TOPICS" 
nnA&ssI 1 UlO PRINT "7) GROUP STUDENTS H'' 



OMOGENEOUSLY" 
L21"0 V TAB 21 

12^00 PRINT "ENTER UP TO THREE S 

TRATEGIES" 
12210 PRINT "PRESS <R> TO RETURN 

TO MENU" 
1221'r. C - 0:X = 30 
rJ?AO V TAB 22: HTAB X 
1 JV4'o C = C + 1 

12246 IF C = 4 THEN GOTO 12500 
1.J250 GET A* 

12260 IF A* = "R" THEN GOTO 125 

00 

12270 IF VAL (A*) < 1 OR VAL ( 

A*) > 7 THEN GOTO 12250 
12280 PRINT A$ 

12290 IF C = 1 THEN D*(L(5) + 24 

) == A*: X = 33 
12300 IF C = 2 THEN D*(L<5) +25 

) = A$: X = 36 
1231U IF C - 3 THEN D*(L(5) +26 

) = A$: X = 39 
123 I !rj PRINT 
1232m GOTO 12240 

12500 FOR Z " 1 TO 2000: NEXT Z: 
RETURN 

13000 HOME : PRINT SPC < 5) "SUGG 

EST I QMS FOR IMPROVEMENT IN" 
1 -.Ou i I)1i(L(5) + 28 J = "" 
1 :!.')(.)/ D* k L (5) + 29) == " " 
1. i-OO .:. D* ( L ( 5 ) + 30 ) = " " 
1 30 1 0 PR I NT SPC ( 8 ) " MASTERY OF 

CONTENT UNITS" 
1302O FOR Z = J. TO 39 
J.303v PRINT H *-"5 
J 304'.' NEXT I 
I 3U4'.b PR IN! : PR INI 
liOfbu PRINT " i ) ANALYZE DAILY SU 

CCE'J ? F ATTERNS-" 
1 PRINT "2> DETERMINE UNIT T 

LSI VALID I TY" 
I 3< y/0 PR ! N T SPC ( 3 ) " OR AL I GNMEN 

I" UN IN INSTRUCT I ON" 
J*OU" i-1-.jmt "3) HOMOGENEOUSLY GR 

OUI- jTiJDfcNTB FOR" 
3 'l: I PRINT SPC< 3) "REMEDIATION 
i »Nb ' ( \H I OR LEARN I MG " 
PFINT SrCi 3) "DEF1CIENCIE 

l.'nVO i-RJI-1 "4- LOWER STANDARDS 

' Nil iM- SK] LLS" 

I i 'K i M I " !: -. ) RK PEACH US I NG A 

.Ml i" i" I- a- N I AI'PKOACH" 
1 • M - : I- « N I :-;!..{ )U PACING" 

1 * 1 - I * •■ : U i " > j 1 MCREABE MO T I VAT 



J "' I I I l Ml 0L( RLASE ABSENCE 




! "I WIDK UP 10 THREE S 
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ikfiltblEE, OR" 

Ui.v riarii -kress to return 

IU MLNU" 
i - i . *. L •■ < - 3«j 

li" C 4 THEN C = 0: GOTO 
1 -!ov ; j 

l-'Lbv V;A& 22: HTAB X 
1 (JET A$ 

1-.2C-.) IF A$ - "R " THEN GOTO 135 



i it val <a*) < 1 or val ( 

A*) ::• Q THEN GOTO 13190 
1J22U PRINT A$ 

13230 IF C = 1 THEN D$(L<5> + 78 

) = A$:X ■ 33 
13240 IF C = 2 THEN D*<L<5) + 29 

) = A$: X = 36 
13250 IF C ■ 3 THEN D*(L(5) + 30 

) = A$: X = 39 
13260 GOTO 13175 

13500 FOR I = 1 TO 2000: NEXT Z: 
RE1 URN 




"M" THEN GGSUB 

"U" THEN GGSUB 

0" THEN GOSUB 

"S" OR C*<0) = 



— ii nn 



14000 IF C$(0) 

15000 
14020 IF C*(0) 

16000 
J 4030 IF C*(0) 

1 7000 
14040 IF C$<0) 

" D " THEN GGSUB 18000 
14o4J D*(L(5) + 32) ■•= " 11 
14042 D4 (L (5) + 33) ~ " " 
1404. :: . D$CL(5) +34) = 11 " 
14050 VTAB 21 

14060 PRINT "ENTER UP TO THREE S 

TRATEG1ES, OR" 
14070 PRINT "PRESS <R> TO RETURN 

TO MENU" 
14080 C = 0: X = 30 
14070 C - C + 1 

14100 IF C = 4 THEN GOTO 14999 
14110 VTAB 22: HTAB X 
14 '.20 GET A* 

14130 IF At = "R" THEN GOTO 149 

99 

141 4o IF VAL (A*) < 1 OR VAL ( 

A* ) > 5 THEN GOTO 14120 
14150 PRINT A* 

14160 IF C = 1 THEN D*(L<5) + 32 

) = A$: X = 33 
14170 IF C = 2 THEN D*(L(5) + 33 

) = A$: X = 36 
14180 IF C = 3 THEN D*(L(5) + 34 

> = A$:X = 39 
14190 GOTO 14090 

14990 FOR 7 « 1 TO 2000: NEXT Z: 
RETURN 

14799 FOR Z = 1 TO 2000: NEXT Z: 
RETURN 



4: 



48 



1500U HOME : PRINT SPC ( 5) "SUGG 
EST IONS FOR IMPROVEMENT IN" 

150 10 PRINT "ENGAGEMENT RATE-MAN 
AGEMENT/ TRANS I T I ON " 

15U20 FOR 7=1 TO 39 

15030 PRINT 

15O40 Mi;XT Z 

lbu5() PRINT : PRINT 

J5O60 PRINT "1) HAVE MATERIALS A 
ND SUPPLIES READY" 

15070 PRINT SPC< 3) "IN ADVANCE " 

15075 PRINT 

1SOS0 PRINT "2) USE MORE ROUTINE 

S AND STANDARD" 

15090 PRINT SPC( 3) "PROCEDURES" 

15095 PRINT 

15100 PRINT "3) REDUCE TIME STUD 

ENTS WANT FOR HELP" 
15110 PRINT SPC( 3) "ON NEW ACT I 

VI TV" 
15 J 15 PRINT 

1 5 1 1 / PR I NT " 4 ) MI N I M I ZE INTERRU 

P HONS" 
15:! lo PRINT 

15120 PRINT "5) SET TIME LIMITS" 
15130 RETURN 

16000 HOME : PRINT SPC < 5) "SURG 
EST IONS FOR IMPROVEMENT IN" 

1601(1 PRINT "ENGAGEMENT RATE-UNO 
CCUP I ED /OBSERVING" 

1.600,/ FOR Z = 1 TO 39 

I603u PRINT 

1604.J NEXT Z 

lo05'.- PRINT : PRINT 

160*0 PRINT "1) PLAN CONTINUOUS 
ACTIVITIES 

16'..)/',' PRINT 

16080^ PRINT "2) MOVE AROUND ROOM 
1. 6085 PR I NT 

16090 PRINT "3) REINFORCE GOOD B 

EHAVIOR" 
16095 PRINT 

161.00 PRINT "4) RESTRUCTURE PHYS 

ICAL ENVIRONMENT" 
17000 HOME : PRINT SPC < 5) "SUGG 

EST IONS FOR IMPROVEMENT IN" 
I'Olo PRINT SPC ( 7) "ENGAGEMENT 

KA IE-OUT OF ROOM" 
17m,:-, PUR i m l ro 39 
l/03( PRINT 
1 >'04u Ntr.X r Z 
W05o PRINT : PR INI 
W>->60 PRTN1 "1) REFUSE PERM I SS 10 

N FOR UNNEXCESSARY" 

FR?C" 7 ''''" PR,NT SPC< 3) " EXCURSI0NS " 



17080 PRINT 

17090 PRINT "2) ALLOW ONLY 1 STU 

DENT AT A TIME TO GO" 
17100 PRINT SPC( 3) "TO THE LAVO 

RATORY" 
17200 PRINT 

17300 PRINT "3) TIGHTEN SCHOOL P 
OLICIES" 

1800(1 HOME : PRINT SPC ( 5) "SUGG 
EST IONS FOR IMPROVEMENT IN" 

18010 PRINT "ENGAGEMENT RATE-SOC 
IALIZ I NG/ DISCIPLINE" 

18020 FOR 2 = 1 TO 39 

1803O PRINT 

18040 NEXT Z 

1805(1 PRC NT : PRINT 

1806U PP. 1 NT "1) SEPARATE STUDENT 

r - it 

L807 ¥ t' PRINT 

IrtO&i) PRINT "2) STATE EXPECT AT 10 

NS AND MONITOR" 
13090 PRINT SPC( 3) "BEHAVIOR" 
18100 PRINT 

1811 0 PR I NT " 3 ) RE I NFORCE GOOD B 

EHAVIOR" 
1812(1 RETURN 

1900':.) HUME : VTAB 5:A1* = " " : A2* 
ii 'i 

19UU' : .j V = 0:D*(L<5) + 36) = " " : D* 1 

(L<5) + 37) = "" 
1919'.) PRINT " PLEASE ENTER YOUR C 

OMMEN IS BELOW : " 
1920O FR1N7 : PRINT 
3*3<V, ?< POS FLD,6,36 
193!0 & INPUT ,W$,0 
193l.'ri PRINT 
19 ' & POS FLD,6,37 
19330 h INPUT ,W2*,0 
l*"S4v DS(L<5) +36) = W* 
5. 9350 D*(L(5) + 37) = W2$ 
5 9360 VTAB 24: INPUT "PRESS <RET 

URN> TO RETURN TO MENU" ; BL$ 
19370 RETURN 

25O0CJ IF X* « "Y" THEN PRINT CHF 

(4) ; "PR#1" 
2500S HOME : PRINT : PRINT "THIS 
IS THE END OF THE CDNFERENC 

E" 

25010 PRINT "PROGRAM. YOUR DATA 

IB BEING STORED AS" 
2502(.- PRINT "FOLLOWS: 
25021 D*(L(5) + 19) « 
25;.»22 D*<1 (5) + 23) =» 
25023 L)*«L<5) + 31) = 
25U24 D*(L(5) + 27) •= 
250 3< • PRINT 

25U35 Dt»(L(5) + 10) = STR$ ( NM ) 



OPY 

27) - "X" 50 



25036 d»<l(5) + in = STR* (U) BEST COPY AVAILABLE 

FRir" IF OP (3) - 1 THEN D*(L(5) + Dtol UUrT AVMILRRLt 



2 50 4 O 


?■ PQ<5 FID £ 1 0 




25O50 


% pRTMAME.O 

1 1X114 1 1 1 | U. q 




25060 


S< PRINT . D$(L(5) 


+ 1 0 ) 


25O70 


POS FLD, 6,11 




25080 


I' PRTNAME, 0 




250 9U 


& PRINT ,D$(L<5) 


+ 11) 


250*V5 


FN: INT 




25100 


IF DP<1) = 1 THEN 


D*(L<5 




19) = "X" 




251 10 


IF OP (2) = 1 THEN 


D* ( L ( 5 




23) = "X" 





120 IF OP (4) = 1 OR OP (5) = 
1 THEN D*(L<5) + ; 



OP (6) = 
= ««x» 
25130 D$CL<5) 
25140 D$(LC5) 

) ) 

25250 D*CL(5) 
) ) 

2526-> D$(L<5) 
) ) 

25270 D*.L(S) 
252S0 D$'!L<5) 
25290 D*(L(5) 
D$(L(5) 
& 
5 



) 
1 

51 ) 



OR 



12) 
13) 

14) 

15) 



STR* 
STR* 

STR* 




253 of 
2 5 3 ■ . ■ 
25340 
25350 
2536 ;> 
25370 
25330 
2 53 9" ! 
2 MOO 

254 iO 
2541". 
2542m 
25430 
25440 
2545(i 
25460 
2S47n 
25490 
25490 
25500 

255 lO 
25520 
25530 
2554' - 



pi 

?■■ 



+ 16) * STR* 
+ 17) ■ STR* 
+ 18) = STR* 
+ 35) = C* ( 0 ) 
PQS FLD ,6,12 
PRTNAME, 0 
PRINT , D*<L(5) + 12) 
POS FLD , 6 , .13 
I NT 

PRTNAME , 0 

PRINT , D*(L (5) + 13) 

POS FLD, 6, 14 
PRTNAME, 0 

PRINT ,D*(L(5) + 14) 

PQS FLD, 6, 15 
PRTNAME , 0 

PRINT , D$(LC5) + 15) 



(CT) 
(AV (2 

(AV(0 

<AV < 1 

; 'NG) 
CAD 
(ER) 



PR [NT 

?' POS FLD, 6, 16 
2< PRTNAME, 0 

& PRINT ,D*(L<5) + 16) 
2< POS FLD, 6, 17 
?• PRTNAME , 0 

PRINT " ";D*(L(5) + 17)? 
S< POS FLD, 6, IS 
?< PRTNAME , 0 

8< PRINT ,D*(L(5) + IS) 
PRINT 



POS FLD, 6, 19 



ERIC 



25580 
25590 
i'5595 
J561 U 



PRTNAME, 0 
PRINT ,D*(L(5) 
POS FLD, 6, 20 
PRTNAME, 0 
PRINT ,D*(L(5) 
POS FLD, 6, 21 
PRTNAME, 0 
S< PRINT ,D*(L<5) 
PRINT 

PRINT "COVERAGE 



+ 19) 



20) 



+ 21) 



P O 



51 



256110 


& PRINT ,D*(L<5) 




22) 


25630 


?< POS FLD, 6, 23 






25650 


S< PRINT , D$<L<5) 


+ 


23) 


25660 


8< POS FLD, 6, 24 






25670 


S< PRTNAME, 0 






25680 


& PRINT ,D*<L<5) 


+ 


24) 


25690 


& POS FLD, 6, 25 






2570'.' 


?/ PRTNAME , 0 






25710 


& PRINT ,D$<L<5) 


+ 


25) 


25720 


Z< POS FLD, 6, 26 






25730 


2/ PRTNAME, 0 






25740 


2/ PRINT P D*(L<5) 




26) 


25745 


PRINT 






25750 


*< POS FLD, 6, 27 






o cr -r / . , 

X_ v-J / O' ^ 


% PRTNAMEj, 0 






2577-.J 


?/ PRINT , D$(L(5) 


+ 


27) 


2578<» 


& POS FLD, 6, 28 






25790 


& PRTNAME , 0 






258oO 


PRINT ,D$(L(5) 


+ 


28) 


2 SO in 


& POS FLD, 6, 29 






25820 


& PRTNAME, 0 






25L-J50 


& PRINT ,D*(L<5) 




29) 


25840 


?< POS FLD, 6, 30 






25B5»'i 


3< PRTNAME, 0 






25860 


& PRINT ,D*(L(5) 


+ 


30) 


25865 


PRINT 






258/0 


& POS FLD, 6,31 






258b f- 


& PRTNAME, 0 






25890 


PRINT ,D*(L(5) 


+ 


31 ) 


25900 


?/. POS FLD j, 6 ,32 






25910 


& PRTNAME, 0 






25920 


& PRINT ,D$(L(5) 




—r t~ t \ 


259'.; u 


& POS FLD, 6, 33 






25940 


& PR i" NAME- , 0 








f/ PRINT ,D$(L(5) 


+ 




2596U 


& POS FLD , 6,34 






25 V 70 


?/ PRTNAME, 0 






2l:.V£k- 


& PRINT , D$(L<5) 


+ 


34 


25^85 


PRINT 






2S990 


& POS FLD, 6, 35 








?< PRTNAME, 0 






2601 0 


?< PRINT , D*<L<5) 




35 


26<>20 


?< POS FLD, 6, 36 






2603O 


i- PRTNAME, 0 






26035 


PRINT 







260 40 Z, PRINT ,D$(L(5) +36) 

r^O'oO & POS FLD, 6, 37 

2/(i60 h PRTNAME, 0 

27070 % PR INI ,D*(L<5) + 37) 

2 708O & RECUPE) , 6 , D* ( 1 ) 



